home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / UTIL / MEMORY / OLD / MEM208SRC / FSLib / s / dropper < prev    next >
Text File  |  1992-10-27  |  1KB  |  72 lines
  1. ; $Id: s.dropper 3.1 93/03/09 23:42:40 brian Exp $
  2. ; INITIALLY generated by Norcroft RISC OS ARM C vsn 4.00 [May  3 1991]
  3. a1 RN 0
  4. a2 RN 1
  5. a3 RN 2
  6. a4 RN 3
  7. v1 RN 4
  8. v2 RN 5
  9. v3 RN 6
  10. v4 RN 7
  11. v5 RN 8
  12. v6 RN 9
  13. sl RN 10
  14. fp RN 11
  15. ip RN 12
  16. sp RN 13
  17. lr RN 14
  18. pc RN 15
  19.  
  20. f0 FN 0
  21. f1 FN 1
  22. f2 FN 2
  23. f3 FN 3
  24. f4 FN 4
  25. f5 FN 5
  26. f6 FN 6
  27. f7 FN 7
  28.  
  29.         AREA |C$$code|, CODE, READONLY
  30.  
  31.         IMPORT  |__main|
  32. |x$codeseg|
  33.         B       |__main|
  34.  
  35.         DCB     "dropper",0
  36.         DCD     &ff000008
  37.  
  38.         IMPORT  |x$stack_overflow|
  39.         EXPORT  dropper
  40. dropper
  41.         STMFD   sp!, {lr}
  42.         SUB     sp,sp,#16*4
  43.         MOV     a1,#7
  44.         ADR     a2,mycallback
  45.         MOV     a3,sp
  46.         MOV     a4,sp
  47.         SWI     &20040
  48.         STMFD   sp!,{a2-a4}
  49.         TEQP    pc,#0
  50.         MOV     a1,#0
  51.         MOV     a2,#1
  52.         SWI     &20006  ;XOS_Byte
  53.         SWI     &16     ;OS_EnterOS
  54.         MOV     a1,#7
  55.         LDMFD   sp!,{a2-a4}
  56.         SWI     &20040
  57.         ADD     sp,sp,#16*4
  58.         LDMFD   sp!, {pc}^
  59. mycallback
  60.         SWI     &2001B
  61.         MOV     lr,ip
  62.         LDMIA   lr,{a1-lr}^
  63.         ANDEQ   a1,a1,a1
  64.         LDR     lr,[lr,#15*4]
  65.         MOVS    pc,lr
  66.  
  67.         AREA |C$$data|
  68.  
  69. |x$dataseg|
  70.  
  71.         END
  72.